Figures
ConcvTime
##
## CncvTm> data("twoCmt")
##
## CncvTm> ex1=ConcvTime(datFile = twoCmt,ID = '1',ipredVar = 'IPRED')
##
## CncvTm> ex2=ConcvTime(datFile = twoCmt,ID = '1',ipredVar = 'IPRED',minorTicks = T)
## Scale for 'x' is already present. Adding another scale for 'x', which
## will replace the existing scale.
##
## CncvTm> list(ex1,ex2)
## [[1]]
##
## [[2]]
ConcvTimeInd
##
## CncvTI> data("twoCmt")
##
## CncvTI> twoCmt=twoCmt%>%mutate(DOSE=factor(DOSE))
##
## CncvTI> ex1=ConcvTimeInd(datFile = twoCmt)
##
## CncvTI> ex2=ConcvTimeInd(datFile = twoCmt,facetBy = 'SEX')
##
## CncvTI> list(ex1,ex2)
## [[1]]
##
## [[2]]
ConcvTimeMult
##
## CncvTM> data("twoCmt")
##
## CncvTM> twoCmt=twoCmt%>%mutate(DOSE=factor(DOSE))
##
## CncvTM> ## Not run: ConcvTimeMult(datFile = twoCmt,ipredVar='IPRED')
## CncvTM> ex1=ConcvTimeMult(datFile = twoCmt,ipredVar='IPRED',genAll=F,page=1)
##
## CncvTM> ex2=ConcvTimeMult(datFile = twoCmt,ipredVar='IPRED',genAll=F,page=2,nrow =5,ncol=4)
##
## CncvTM> list(ex1[[1]],ex2[[1]])
## [[1]]
## [[1]]$pList
## [[1]]$pList$`1`
##
##
## [[1]]$plotCols
## [1] 1
##
## [[1]]$plotRows
## [1] 1
##
##
## [[2]]
## [[2]]$pList
## [[2]]$pList$`2`
##
##
## [[2]]$plotCols
## [1] 1
##
## [[2]]$plotRows
## [1] 1
ConcvTimeSum
##
## CncvTS> data("twoCmt")
##
## CncvTS> twoCmt=twoCmt%>%mutate_each(funs(factor),DOSE,SEX)
##
## CncvTS> ConcvTimeSum(datFile = manipDat(twoCmt,groupBy = 'SEX',sumThis = T))
GOF
##
## GOF> data("twoCmt")
##
## GOF> GOF(twoCmt,cwresBy = 'IRES')
OBSvIPRED
##
## OBSIPR> data("twoCmt")
##
## OBSIPR> ex1=OBSvIPRED(twoCmt%>%filter(DV>0),xBy='IPRED')
##
## OBSIPR> ex2=OBSvIPRED(twoCmt,xBy='IPRED',xScale = 'identity',markBy = 'SEX')
##
## OBSIPR> list(ex1,ex2)
## [[1]]
## `geom_smooth()` using method = 'gam'
##
## [[2]]
## `geom_smooth()` using method = 'gam'
QQplot
##
## QQplot> data("twoCmt")
##
## QQplot> ex1=QQplot(twoCmt)
##
## QQplot> ex2=QQplot(twoCmt,markBy = 'SEX')
##
## QQplot> ex3=QQplot(twoCmt,facetBy = 'DOSE')
##
## QQplot> list(ex1,ex2,ex3)
## [[1]]
##
## [[2]]
##
## [[3]]
barchartMult
##
## brchrM> data("twoCmt")
##
## brchrM> ex1=barchartMult(datFile = twoCmt)
##
## brchrM> ex2=barchartMult(datFile = twoCmt,catList = list(c('SEX','Gender')))
##
## brchrM> ex3=barchartMult(datFile = twoCmt,nrow=2)
##
## brchrM> list(ex1,ex2,ex3)
## [[1]]
##
## [[2]]
##
## [[3]]
covCat
##
## covCat> data("twoCmt")
##
## covCat> ex1=covCat(twoCmt,catList = list('SEX'),conList = 'IPRED',nCols=1)
##
## covCat> ex2=covCat(twoCmt,catList = list(list('SEX','Gender'),list('DOSE')),conList = list(list('IPRED'),list('ETA1',expression(eta[1]))))
##
## covCat> list(ex1,ex2)
## [[1]]
##
## [[2]]
## notch went outside hinges. Try setting notch=FALSE.
## notch went outside hinges. Try setting notch=FALSE.
covCon
##
## covCon> data("twoCmt")
##
## covCon> ex1=covCon(twoCmt,conList_x = 'IPRED',conList_y = 'ETA1',nCol=1)
##
## covCon> ex2=covCon(twoCmt,
## covCon+ conList_x = list(
## covCon+ list('IPRED','Individual Prediction'),
## covCon+ list('IRES','Individual Residual')
## covCon+ ),
## covCon+ conList_y = list(
## covCon+ list('ETA1',expression(eta[1]))
## covCon+ )
## covCon+ )
##
## covCon> list(ex1,ex2)
## [[1]]
##
## [[2]]
distMult
##
## dstMlt> data("twoCmt")
##
## dstMlt> ex1=distMult(twoCmt)
##
## dstMlt> ex2=distMult(twoCmt,order = c("Boxplot","Density","QQ"))
##
## dstMlt> list(ex1,ex2)
## [[1]]
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
##
## [[2]]
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
ggpairs
##
## ggpars> data("twoCmt")
##
## ggpars> ex1=ggpairs(twoCmt,xCols=c('ETA1','ETA2'))
##
## ggpars> ex2=ggpairs(twoCmt,xCols=c('ETA1','ETA2','ETA5'))
##
## ggpars> list(ex1,ex2)
## [[1]]
##
## [[2]]
paramDist
##
## prmDst> data("twoCmt")
##
## prmDst> ex1=paramDist(twoCmt)
##
## prmDst> ex2=paramDist(twoCmt,xCols=c('ETA1','ETA2'),xLab=c(expression(eta[1]),expression(eta[2])))
##
## prmDst> list(ex1,ex2)
## [[1]]
##
## [[2]]